home *** CD-ROM | disk | FTP | other *** search
/ Virtual Sex Shoot / Virtual Sex Shoot.iso / mac / Virtual Sex Shoot / Virtual Sex Shoot.DXR / 00262_NodeLeaveHandler Check.ls < prev    next >
Encoding:
Text File  |  1995-09-24  |  542 b   |  22 lines
  1. global gPanoMovieID, gPanoMovieObj, gTestCallbackFactory
  2.  
  3. on mouseUp
  4.   if the machineType = 256 then
  5.     if objectp(gPanoMovieObj) then
  6.       if the hilite of cast "NodeLeaveHandler Check" then
  7.         gPanoMovieObj(mSetNodeLeaveCallback, gTestCallbackFactory, "TestNodeLeaveHandler")
  8.       else
  9.         gPanoMovieObj(mSetNodeLeaveCallback, gTestCallbackFactory, EMPTY)
  10.       end if
  11.     else
  12.       beep()
  13.     end if
  14.   else
  15.     if gPanoMovieID <> EMPTY then
  16.       SetupHandler("NodeLeaveHandler")
  17.     else
  18.       beep()
  19.     end if
  20.   end if
  21. end
  22.